home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 4 / Mac Giga-ROM 4.0 - 1993.toast / FILES / DEV / I-Z / ResCopy.cpt / ResCopy XCMD / card_3913.txt < prev    next >
Text File  |  1989-02-02  |  3KB  |  139 lines
  1. -- card: 3913 from stack: in
  2. -- bmap block id: 7659
  3. -- flags: 0000
  4. -- background id: 6338
  5. -- name: MenuDown
  6. ----- HyperTalk script -----
  7. on checkMe msLoc
  8.   global oneIsHighlighted
  9.   put the rect of the target into butRect
  10.   if item 1 of msLoc > item 1 of butRect and item 2 of msLoc > item 2 of butRect and item 1 of msLoc < item 3 of butRect and item 2 of msLoc < item 4 of butRect then
  11.     set the highlight of the target to true
  12.     put the short name of the target into foo
  13.     put card field foo into card field "window"
  14.     put true into oneIsHighlighted
  15.   else
  16.     set the highlight of the target to false
  17.   end if
  18. end checkMe
  19.  
  20.  
  21. -- part 1 (field)
  22. -- low flags: 80
  23. -- high flags: 0001
  24. -- rect: left=0 top=0 right=32 bottom=140
  25. -- title width / last selected line: 0
  26. -- icon id / first selected line: 0 / 0
  27. -- text alignment: 0
  28. -- font id: 3
  29. -- text size: 9
  30. -- style flags: 0
  31. -- line height: 12
  32. -- part name: title
  33.  
  34.  
  35. -- part 2 (field)
  36. -- low flags: 80
  37. -- high flags: 0001
  38. -- rect: left=140 top=0 right=32 bottom=315
  39. -- title width / last selected line: 0
  40. -- icon id / first selected line: 0 / 0
  41. -- text alignment: 0
  42. -- font id: 3
  43. -- text size: 9
  44. -- style flags: 0
  45. -- line height: 12
  46. -- part name: rename
  47.  
  48.  
  49. -- part 3 (field)
  50. -- low flags: 80
  51. -- high flags: 0001
  52. -- rect: left=315 top=0 right=32 bottom=490
  53. -- title width / last selected line: 0
  54. -- icon id / first selected line: 0 / 0
  55. -- text alignment: 0
  56. -- font id: 3
  57. -- text size: 9
  58. -- style flags: 0
  59. -- line height: 12
  60. -- part name: renumber
  61.  
  62.  
  63. -- part 4 (field)
  64. -- low flags: 01
  65. -- high flags: 2004
  66. -- rect: left=173 top=83 right=148 bottom=337
  67. -- title width / last selected line: 0
  68. -- icon id / first selected line: 0 / 0
  69. -- text alignment: 0
  70. -- font id: 0
  71. -- text size: 12
  72. -- style flags: 0
  73. -- line height: 16
  74. -- part name: window
  75.  
  76.  
  77. -- part 5 (button)
  78. -- low flags: 00
  79. -- high flags: 0000
  80. -- rect: left=227 top=174 right=191 bottom=355
  81. -- title width / last selected line: 0
  82. -- icon id / first selected line: 0 / 0
  83. -- text alignment: 1
  84. -- font id: 0
  85. -- text size: 12
  86. -- style flags: 0
  87. -- line height: 16
  88. -- part name: rename
  89.  
  90.  
  91. -- part 6 (button)
  92. -- low flags: 00
  93. -- high flags: 0000
  94. -- rect: left=227 top=190 right=206 bottom=355
  95. -- title width / last selected line: 0
  96. -- icon id / first selected line: 0 / 0
  97. -- text alignment: 1
  98. -- font id: 0
  99. -- text size: 12
  100. -- style flags: 0
  101. -- line height: 16
  102. -- part name: renumber
  103.  
  104.  
  105. -- part 7 (button)
  106. -- low flags: 00
  107. -- high flags: A003
  108. -- rect: left=205 top=313 right=337 bottom=302
  109. -- title width / last selected line: 0
  110. -- icon id / first selected line: 0 / 0
  111. -- text alignment: 1
  112. -- font id: 0
  113. -- text size: 12
  114. -- style flags: 0
  115. -- line height: 16
  116. -- part name: More Help...
  117. ----- HyperTalk script -----
  118. on mouseUp
  119.   go to card id 5663
  120. end mouseUp
  121.  
  122.  
  123.  
  124.  
  125. -- part contents for card part 4
  126. ----- text -----
  127. Highlight a menu item to see that item‚Äôs function‚Ķ
  128.  
  129. -- part contents for card part 1
  130. ----- text -----
  131. Highlight a menu item to see that item‚Äôs function‚Ķ
  132.  
  133. -- part contents for card part 2
  134. ----- text -----
  135. Allows you to assign a (new) name to the selected resource.
  136.  
  137. -- part contents for card part 3
  138. ----- text -----
  139. Allows you to change the ID number of the selected resource.